



use EI-Final.dta

** Table 2; Table 3 **
sum PATENT Male_CEO SIZE AGE CEOA  CEOE  RD CA LEV  TAN BI IH TOP1
ssc install logout
logout, save(表2) word dec(4) replace: tabstat PATENT Male_CEO SIZE AGE CEOA  CEOE  RD CA LEV  TAN BI IH TOP1, stat( mean sd min p50 max n)  c(s)  f(%9.3f)
logout, save(表3) word dec(4) replace:  pwcorr PATENT Male_CEO SIZE AGE CEOA  CEOE  RD CA LEV  TAN BI IH TOP1,sig


** Table 4 **
xtpqml PATENT SIZE AGE RD CA LEV  TAN BI IH TOP1 REG*,i(Stkcd)
est store m1
xtpqml PATENT Male_CEO  CEOA  CEOE SIZE AGE  RD CA LEV  TAN BI IH TOP1 REG*,i(Stkcd) irr
est store m2
esttab m1 m2, star(* .1 ** .05  *** .01) nogap nonumber b(%9.3f)  scalars(N  r2_a ) mtitles  ,  using m.rtf,replace


** Table 5 **
xtpqml PATENT Male_CEO Male_SIZE SIZE AGE CEOA  CEOE  RD CA LEV  TAN BI IH TOP1 REG*,i(Stkcd)
est store m1
xtpqml PATENT Male_CEO  CEOA_SIZE SIZE AGE CEOA  CEOE RD CA LEV  TAN BI IH TOP1 REG*,i(Stkcd)
est store m2
xtpqml PATENT Male_CEO CEOE_SIZE SIZE AGE CEOA  CEOE RD CA LEV  TAN BI IH TOP1 REG*,i(Stkcd)
est store m3
xtpqml PATENT Male_CEO Male_SIZE  CEOA_SIZE CEOE_SIZE SIZE AGE CEOA  CEOE  RD CA LEV  TAN BI IH TOP1 REG*,i(Stkcd)
est store m4
esttab m1 m2 m3 m4, star(* .1 ** .05  *** .01) nogap nonumber b(%9.3f)  scalars(N  r2_a ) mtitles  ,  using m1.rtf,replace

 
Robustness Test
** Table 6 **
1.Change the dependent variable

xtpqml PATENT1  Male_CEO  CEOA  CEOE  SIZE AGE RD CA LEV  TAN BI IH TOP1 REG*,i(Stkcd)
est store m1
xtpqml PATENT1 Male_CEO CEOA  CEOE  Male_SIZE CEOA_SIZE  CEOE_SIZE SIZE AGE RD CA LEV TAN BI IH TOP1 REG*,i(Stkcd)
est store m2
esttab m1 m2, star(* .1 ** .05  *** .01) nogap nonumber b(%9.3f)  scalars(N  r2_a ) mtitles  ,  using m2.rtf,replace

2.Use an alternative method

xtnbreg PATENT Male_CEO CEOA CEOE SIZE AGE  RD CA LEV  TAN BI IH TOP1 REG*,fe
est store m1
xtnbreg PATENT Male_CEO CEOA CEOE Male_SIZE CEOA_SIZE  CEOE_SIZE SIZE AGE  RD CA LEV  TAN BI IH TOP1 REG*,fe
est store m2
esttab m1 m2, star(* .1 ** .05  *** .01) nogap nonumber b(%9.3f)  scalars(N  r2_a ) mtitles  ,  using m3.rtf,replace


3. Exclude the crisis period from the sample

drop if year==2020
xtpqml PATENT Male_CEO CEOA  CEOE  SIZE AGE RD CA LEV  TAN BI IH TOP1 REG*,i(Stkcd)
est store m1
xtpqml PATENT Male_CEO CEOA  CEOE  Male_SIZE CEOA_SIZE  CEOE_SIZE SIZE AGE RD CA LEV  TAN BI IH TOP1 REG*,i(Stkcd)
est store m2
esttab m1 m2, star(* .1 ** .05  *** .01) nogap nonumber b(%9.3f)  scalars(N  r2_a ) mtitles  ,  using m4.rtf,replace
